home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 41.zip / BS1 part 41 / Lattice C v5.02 d4.adf / examples / debugger / sort.c < prev    next >
Text File  |  1988-11-07  |  407b  |  30 lines
  1. /* Initialize an array of integers */
  2.  
  3. void init(ip)
  4. int ip[];
  5. {
  6.      int i;
  7.     int *p;
  8.     
  9.     p = ip;
  10.     for (i = 0; i < 10; i++)
  11.         *p++ = i;
  12. }
  13.  
  14. /* Pairwise sort elements of an array */
  15.  
  16. sort(ip)
  17. int *ip;
  18. {
  19.     int i, s;
  20.     int *p;
  21.     
  22.     p = ip;
  23.     s = 0;    /* no swaps performed yet */
  24.     for (i=0; i < 10 - 1; i++)
  25.         if (p[i] < p[i+1] ) {
  26.         swap(&p[i], &p[i+1] );
  27.         s = 1;    /* indicate a swap took place */
  28.         }
  29.     return(s);
  30. }